home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
NT Sources
/
Infomagic - NT Source Volume 1 (Disc 1 of 2).iso
/
graphics
/
bbdemo.exe
/
_SETUP.1
/
ADDEDIMG.dll
/
RCDATA
/
TCLIPBOARDFORM
/
TCLIPBOARDFORM.txt
< prev
Wrap
Text File
|
1998-01-29
|
5KB
|
185 lines
object ClipboardForm: TClipboardForm
Left = 266
Top = 198
BorderIcons = [biMinimize, biMaximize]
BorderStyle = bsDialog
Caption = 'Clipboard'
ClientHeight = 77
ClientWidth = 246
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
OnPaint = FormPaint
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 8
Top = 34
Width = 231
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Please wait...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object LkAlbumTable: TwwTable
DatabaseName = 'BOWERBIRD'
TableName = 'LkAlbum.DB'
SyncSQLByRange = True
NarrowSearch = False
ValidateWithMask = True
Left = 13
Top = 5
object LkAlbumTableAlbumID: TStringField
FieldName = 'Album ID'
Size = 8
end
object LkAlbumTableAlbum: TStringField
FieldName = 'Album'
Size = 30
end
object LkAlbumTableLocation: TStringField
FieldName = 'Location'
Size = 255
end
object LkAlbumTableTableName: TStringField
FieldName = 'Table Name'
Size = 8
end
object LkAlbumTableTableCreated: TBooleanField
FieldName = 'Table Created'
end
object LkAlbumTableVolumeLabel: TStringField
FieldName = 'Volume Label'
Size = 11
end
object LkAlbumTableComments: TMemoField
FieldName = 'Comments'
BlobType = ftMemo
Size = 10
end
end
object FotoTable: TwwTable
DatabaseName = 'BOWERBIRD'
TableName = 'FOTOINFO.DB'
SyncSQLByRange = True
NarrowSearch = False
ValidateWithMask = True
Left = 80
Top = 6
object FotoTableAlbumID: TStringField
FieldName = 'Album ID'
Size = 8
end
object FotoTablePictureNumber: TIntegerField
FieldName = 'Picture Number'
end
object FotoTablePosition: TIntegerField
FieldName = 'Position'
end
object FotoTableDateTaken: TDateField
FieldName = 'Date Taken'
end
object FotoTableApproximateDateTaken: TBooleanField
FieldName = 'Approximate Date Taken'
end
object FotoTableDateEntered: TDateField
FieldName = 'Date Entered'
end
object FotoTableCaption: TStringField
FieldName = 'Caption'
Size = 60
end
object FotoTableComments: TMemoField
FieldName = 'Comments'
BlobType = ftMemo
Size = 20
end
object FotoTableSubstituteImage: TBooleanField
FieldName = 'Substitute Image'
end
object FotoTableNoImage: TBooleanField
FieldName = 'No Image'
end
object FotoTableActualFileName: TStringField
FieldName = 'Actual File Name'
Size = 200
end
object FotoTableImageReference: TBooleanField
FieldName = 'Image Reference'
end
object FotoTableReferenceVolumeLabel: TStringField
FieldName = 'Reference Volume Label'
Size = 11
end
object FotoTableImageType: TStringField
FieldName = 'Image Type'
Size = 4
end
object FotoTableImageWidth: TIntegerField
FieldName = 'Image Width'
end
object FotoTableImageHeight: TIntegerField
FieldName = 'Image Height'
end
object FotoTableImageBitsperpixel: TIntegerField
FieldName = 'Image Bits per pixel'
end
object FotoTableImagePlanes: TIntegerField
FieldName = 'Image Planes'
end
object FotoTableImageColours: TIntegerField
FieldName = 'Image Colours'
end
object FotoTableImagePages: TIntegerField
FieldName = 'Image Pages'
end
object FotoTableImageCompression: TStringField
FieldName = 'Image Compression'
end
object FotoTableImageSize: TIntegerField
FieldName = 'Image Size'
end
object FotoTableCopyrightRestricted: TBooleanField
FieldName = 'Copyright Restricted'
end
object FotoTableCopyrightInformation: TStringField
FieldName = 'Copyright Information'
Size = 50
end
object FotoTableThumbnail: TGraphicField
FieldName = 'Thumbnail'
BlobType = ftGraphic
Size = 1
end
end
object SlidTable: TwwTable
TableName = 'AAAAAAAA.DB'
SyncSQLByRange = True
NarrowSearch = False
ValidateWithMask = True
Left = 108
Top = 6
object SlidTablePictureNumber: TIntegerField
FieldName = 'Picture Number'
end
object SlidTablePictureType: TStringField
FieldName = 'Picture Type'
Size = 6
end
object SlidTablePicture: TBlobField
FieldName = 'Picture'
BlobType = ftBlob
Size = 1
end
end
end